<%
set rszz=server.createobject("adodb.recordset")
sqltext="Select top 1 * From Tx_news where News_Classid=9 and UploadFiles IS NOT NULL order by News_id desc"
rszz.open sqltext,conn,1,1
%>
<%
pic=split(Rszz("UploadFiles"),"|")
for a =0 to ubound(pic)
next
%>
-
%>)
" border="0" width="235" height="166">
<%=rszz("News_Content1")%>...
<%
PERPAGE =5
set rs=server.createobject("adodb.recordset")
sqltext="select top 5 * from Tx_News order by News_id desc"
rs.open sqltext,conn,1,1
%>
<%ii=1 %>
<% Do While Not rs.EOF%>
"><%=rs("News_Title")%> |
<%=year(rs("News_date"))%>/<%=month(rs("News_date"))%>/<%=day(rs("News_date"))%> |
<% ii=ii+1
if ii >=PERPAGE+1 then exit do
rs.MoveNext
loop
%>
<%
set rszz=server.createobject("adodb.recordset")
sqltext="Select top 1 * From Tx_news where News_Classid=10 and UploadFiles IS NOT NULL order by News_id desc "
rszz.open sqltext,conn,1,1
%>
<%
pic=split(Rszz("UploadFiles"),"|")
for a =0 to ubound(pic)
next
%>
-
%>)
" border="0" width="235" height="166">
<%=rszz("News_Content1")%>...
<%
PERPAGE =5
set rs=server.createobject("adodb.recordset")
sqltext="select top 5 * from Tx_News order by News_id "
rs.open sqltext,conn,1,1
%>
<%ii=1 %>
<% Do While Not rs.EOF%>
"><%=rs("News_Title")%> |
<%=year(rs("News_date"))%>/<%=month(rs("News_date"))%>/<%=day(rs("News_date"))%> |
<% ii=ii+1
if ii >=PERPAGE+1 then exit do
rs.MoveNext
loop
%>